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Introduction 


Most computer puzzles are versions of ordinary word games, such as 
crossword puzzles or anagrams, that draw their vocabulary from the world 
of computing. The puzzles here are different. They provide games, amuse¬ 
ments, and challenges from within the world of computing itself and 
require some familiarity with Atari BASIC. The puzzles in this first volume 
are quite simple; however, we plan additional volumes with more complex 
and sophisticated puzzles. You do not have to be a computer buff or a 
skillful programmer to solve them. In fact, they would be an ideal comple¬ 
ment to any text or reference manual for a person of any age who is just 
learning BASIC and is beginning to feel the power of creating programs. 

We have not included any PEEKs or POKEs in the puzzles and have not 
used programs longer than 15 lines. These puzzles are designed to help you 
think in BASIC, learn to read a program, and understand something about 
program structure. All the commands in the book are included in the ATARI 
BASIC Reference Manual or in any introductory text on BASIC. Since the 
programs are not that long or complex (though some are tricky and not 
easy to solve automatically), many can be done with a paper and pencil. In 
fact, it’s a good idea to try to think through many of these problems 
without using your computer. Program design is a mental activity that is 
computer-assisted and working on computer problems without using a 
computer can help develop that skill. In order to help you sketch out 
solutions, we’ve provided some formats designed to help with problem 
solving. They are in the Appendix to the book and you should feel free to 
copy them. 

There are five different types of problems in the book: Error State¬ 
ment Problems, Line Scrambles, Line Number Scrambles, Missing Code 
Lines, and Control Character Graphics Design Problems. Some of the pro¬ 
grams deal with numbers; others deal with words. Color and graphics are 
often used. The programs have been selected to illustrate certain aspects of 
Atari BASIC such as nested loops, subroutines, branching, and the mix of 
graphics, words, and numbers. You might even find it useful to incorporate 
some of the smaller programs into larger programs you build yourself. 

The answers to the programs will provide explanations of what the 
program does and give hints that might help you solve other problems. 
They will also give you a correct program. Remember, however, that 
often there is more than one correct answer and, if you feel correct. 
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run your program. If it works you have come up with another 
solution!! 

Here is a simple example that should give you a sense of the different 
types of puzzles in the book: 


lO PRINT "ON A SCALE OF 1 TO 10" 

20 PRINT "HOW DO YOU FEEL TODAY?" 

30 PRINT "1 IS MISERABLE,10 GREAT" 

40 INPUT X 

50 IF X>5 THEN PRINT "HAVE FUN!":END 
60 PRINT "MAYBE THIS WILL HELP..":FOR 
X-l TO 400:NEXT X 
70 GRAPHICS 7:COLOR 1 
80 PLOT 0,0 

90 DRAWTO RND <1> *159,RND(!)*80 
lOO GOTO 80 


This program asks how you feel on a scale of 1 to 10, 1 being misera¬ 
ble and 10 great. If you answer with a number above 5 the computer prints 
"HAVE FUN!” and the program ends. If you answer 5 or less and indicate 
you are not feeling too great, the computer goes into a Graphics mode (line 
70) and draws an unending series of rays of different length emanating 
from the upper left of the screen (point 0,0). It gives the appearance of a 
sun and tries to cheer you up. 

To let you know what a program is supposed to do we have provided 
screen pictures or. as they are usually called, screen dumps to illustrate the 
program as it is supposed to run. Here are two screen dumps of the sample 
program: 


RIJN 

ON A 5CALE OP X TO X 

HOW DO YOU FEEL TODAY? 

X 15 MISERABLE.10 GREAT 

?6 

HAVE TUN• 

READY 

RUN 

ON A SCALE OF X TO XO 

HOW DO YOU rEEL TODAY? 

X IS MISERABLE,XO GREAT 

?10 

HAVE E U N I 

READY 

RUN 

ON A SCALE OE X TO XO 

HOW DO YOU rEEL TODAY? 

X IS MISERABLE,XO GREAT 

?5 

MAYBE THIS WILL HELP.. 
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This program can also illustrate the nature of different puzzle types in 
this book. 


Error Puzzles 

In these puzzles, there will be some error for you to figure out. It could be 
on line 90. for example, which would then read: 

90 error DRflWTO RND(1)*159;RND(1)*80 

The error would be the ; between 159 and the second RND. It should 
be a , or the program wouldn’t work. 

Here's another possible error. Can you figure it out? 

30 error PRINT "1 IS MISERABLE, 10 GREAT 

You probably guessed that the error was the missing " at the end of 
the line. 


Single Line Scrambles 

In these puzzles, one line is all scrambled up. You have to unscramble it to 
make the program work. Here’s a scramble of line 50: 


50 error PRINT 5 THEN >"x" END FUN IF : HAVE 
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The screen clumps will give you the clues needed to unscramble the 
line and make the program work. 


Line Number Scrambles 

Instead of just scrambling a line these puzzles mix up all the line numbers. 
You have to renumber each line to put the program in order and have it run 
as planned. This requires some thought and experimentation and it is here 
that you are likely to find more than one correct unscrambling of a 
program. 

A very simple scramble would just reverse all of the line numbers so 

that 

line 10 becomes line 100 
line 20 becomes line 90 
line 30 becomes line 80 
etc. 

However, you are not likely to come upon such patterned scrambles. 
The line number patterns do not provide hints to the unscrambling of the 
lines. You have to think through to the program structure to solve the 
puzzle. 


Missing Line Puzzles 

In this variant of program puzzles, one line of code is missing. It might be in 
our sample: 

40 PRINT "?????????????" 

or 

80 PRINT "?????????????" 

PRINT "?????????????” is the indicator of the missing code line. 
That does not mean that PRINT,", or ? necessarily appear on the missing 
line. 
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Control Graphics Puzzles 

In addition to its usual graphics modes your Atari has a control character 
graphic set. You can get this set by holding down the control (CTRL) key 
and pressing any of the keys. (Consult your ATARI BASIC Reference 
Manual for a diagram of the Control Graphics Keyboard). 

These characters can be combined to make interesting patterns and 
drawings. They can also be used within your program. Here’s a short pro¬ 
gram that produces a fancy design using control character graphics: 



J-O PRINT I II I -*—H 

20 GOTO 1 li 


The puzzles provide various challenging patterns for you to reproduce, 
fill in, or reconstruct. Here are some samples using the little program above: 
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Now that you have a sense of the kinds of challenges in this book, try 
your hand at solving them. Each section begins simply and then moves on 
to more complex demands. The answers and their explanations are at the 
end of each chapter. Hope you have as much fun solving the puzzles as I had 
inventing them. 
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or 


jetting your program 
to do what you plan 





O ne of the most frustrating things about learning to program a 
computer is that you can work hard at a program and make a tiny 
mistake that throws the whole thing off. It is particularly annoying if you 
have not internalized the programming language you are using. This first 
section contains some puzzles that embody the simplest mistakes every¬ 
body makes when learning to program. These mistakes should be looked at 
as puzzles to solve rather than as signs of your inability to master 
computing. 
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- 1 - 

A SIMPLE CRYSTAL BALL 

This program asks whether you like the number 3 or 4 better. When run, 
this is how it is supposed to respond: 


r ni n 

WHICH NUMBER 15 
or THESE TWO; 3 

?3 

YOU HAVE MY S TICA8 

RE AC-Y 

RUM 

WHICH NUMBER IS 
OF THESE TWOS 3 

?4 

YOU ARE DEEP AND 
READY 


YOUR 
OR 4 


F A V O R IT F 


ROWERS. 


YOUR 
OR 4 


FAUORirE 

•*> 

IN T Li I T I V E 


However, your program simply bombs when you input the number 3. 
It seems OK if you input 4: 


RUM 

WHICH NUMBER 

IS 

YOUR 

FAVORITE 

OF THESE TWO; 

?3 

: 3 

OR 4 

■?' 

READY 

RUN 

WHICH NUMBER 

IS 

YOUR 

FAVORITE 

OF THESE TWO: 

?4 

; 3 

OR 4 


YOU ARE DEER 

AND 

I N T Lt I T I U E 


READY 
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Here is the program. What is the mistake? 


lO PRINT "WHICH NUMBER IS YOUR FAVORIT 
E" 

20 PRINT "OF THESE TWO: 3 OR 4 ?" 

30 INPUT X 

40 IF X-3 THEN GOTO 1010 

50 IF X-4 THEN GOTO 1500 

1000 PRINT "YOU HAVE MYSTICAL POWERS." 

1010 END 

1500 PRINT "YOU ARE DEEP AND INTUITIVE 


1510 END 





How could you change this program to give you the full sun? 


10 GRAPHICS 7:COLOR 1 
20 PLOT 80,40 

30 DRAWTO RND(1)*159,RND(1)*40 
40 GOTO 20 
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- 3 - 

COUNT DRACULA 

You write a simple program asking your friend’s name. You want the 
computer to tell your friend that he or she is a nice person. One of your 
friends decides to play around and type in Count Dracula and here is what 
happens with your program: 


10 PRINT "WHAT IS YOUR NAME?" 

20 DIM A*(10) 

30 INPUT A* 

40 PRINT "YOU ARE A NICE GENTLE PERSON 

11 

50 PRINT M 


Mil A T IS YOUR NAME? 

^COIJNT DRACULA 
YOU ARE A NICE GENTLE 

COUNT DRAG 

READY 


PERSON 


How can you fix your program so that it gives Dracula his full compli¬ 
ments like this? 
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WHAT IS YOUR NAME? 

?COUNT DRACll LA 

YOU ARE A NICE GENTLE PERSON 

COUNT DRACUL.A 

READY 
















sm 


- 4 - 

ALL I WANT IS A SQUARE 

You try to draw a square in Graphics 7 and instead you get the following: 


lO GRAPHICS 7:COLOR 1 

PRINT “HERE IS A SQUARE“ 
PLOT 40,40:DRAWTO 60,40 
DRANTO 60,60:DRAWTO 60,40 
DRAWTO 40,40 


HERE IS A SQUARE: 
READY 

J1 S ,, !SSS!!!S , 


So you try to modify the program and you get: 


10 GRAPHICS 7:COLOR 4 
20 PRINT “HERE IS A SQUARE" 
30 PLOT 40,40:DRAWTO 60,40 
40 DRAWTO 60,60:DRAWTO 40,60 
SO DRAWTO 40,40 


IS 



HERE IS A SQUARE 


READY 
...». 


All you really want is this: 


HERE IS A SQUARE 
READY 


How do you do it and what went wrong with the other two 
programs? 
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- 5 - 

IN FIVE YEARS 

This simple program is supposed to ask a person's age and then tell them 
how old they will be in five years. It should run like this: 


HOW OLD ARE YOU? 

?12 

IN FIVE YEAR5 YOU 

17 

READY 


WILL BE 


Instead it runs like this: 


RUN 


HOW OLD ARE YOU? 

?12 

IN FIUE YEARS YOU WILL BE 

S 


READY 
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Here’s the program. Where’s the error? 


PRINT "HOW OLD ARE YOU?" 

INPUT A 

PRINT "IN FIVE YEARS YOU WILL BE" 
40 PRINT X+S 
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- 6 - 

FILLING THE SCREEN 

This is a reverse puzzle. Here is a program that will progressively fill the 
screen up from top to bottom and left to right. 


10 GRAPHICS 7:COLOR 1 
20 FOR X-l TO 139 
30 FOR Y-l TO 80 
40 PLOT X,Y 
SO NEXT X 
60 NEXT Y 


Now here is a screen dump of the program stopped in midcourse. If it 
were left running the whole screen would be full. 



Now here are two screen dumps of programs that almost do what the 
first program does. A simple error, however, leads to a totally different 
structure on the screen. Notice that these programs lead to ERROR state¬ 
ments. Can you redo the correct program above to create these two 
ERROR statements and their associated screens? 
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Error 6A 



Error 6B 


ERROR- 13 AT LINE OO 
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Answers 


- 1 - 

At line 40 you instructed the program to GOTO line 1010 which ended the 
program. You always have to be careful that your refer your program to 
exactly the lines you want, and it makes sense to check all GOTO state¬ 
ments if you have a program that doesn’t run properly. Here's the program 
with the intended reference: 


10 PRINT "WHICH NUMBER IS YOUR FAVORIT 
E" 

20 PRINT "OF THESE TWO: 3 OR 4 ?" 

30 INPUT X 

40 IF X-3 THEN GOTO lOOO 

50 IF X-4 THEN SOTO 1500 

lOOO PRINT "YOU HAVE MYSTICAL POWERS." 

1010 END 

1500 PRINT "YOU ARE DEEP AND INTUITIVE 

11 

1510 END 


- 2 - 

The problem was at line 30. You only used half the screen. You have to be 
careful about the screen dimensions of the Graphics modes you are pro¬ 
gramming in. At line 30, the number 40 should be 80 as in this program: 


10 GRAPHICS 7:COLOR 1 
20 PLOT 80,40 

30 DRAWTO RND <1)*159,RND<1)*80 
40 SOTO 20 
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- 3 - 

Here is a program that will give Dracula his due: 

10 PRINT "WHAT IS YOUR NAME?" 

20 DIM A*(25) 

30 INPUT A* 

40 PRINT "YOU ARE A NICE GENTLE PERSON 

M 

SO PRINT A* 

Notice that at line 20 the DIM A$(10) has been changed to DIM 
A$(25). When you are storing words in Atari BASIC it is very important to 
make sure that you make your dimension statement large enough to 
contain the largest response you expect. The program, as changed for 
Dracula, wouldn't work if your friend's name was John Wellington Smith 
Frankenstein. Sometimes it makes sense if you are not writing too long a 
program to overdimension your variables in order to anticipate your friends’ 
tricks. DIM A$(100) couldn't hurt in this case. 
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Here is the program: 


10 GRAPHICS 7:COLOR 1 
20 PRINT "HERE IS A SQUARE" 
30 PLOT 40, 40:DRAWTO 60,40 
40 DRAWTO 60,60:DRAWTO 40,60 
SO DRAWTO 40,40 


In one case, you made mistakes with the coordinates you drew. It is 
often useful to sketch out a drawing on graph paper before trying to put 
coordinates in a program. 

In the other case, you used COLOR 4 in your program. If you look in 
your Atari reference manual you'll see that the number 4 doesn't work with 
the COLOR command and so nothing happened. It's important to play with 
COLOR and to PLOT around to get familiar with your Graphics 7 screen. 
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5 


10 PRINT "HOW OLD ARE YOU?" 

20 INPUT X 

30 PRINT "IN FIVE YEARS YOU WILL BE" 

40 PRINT X+5 

Notice that in the error program you INPUT A and then added +5. However, 
there was no X to add anything with and your variables did not agree so the 
computer printed 5 no matter what age was entered. When line 20 was 
changed to 20 INPUT X the program worked. It is essential to check all of 
your variables and see that they are properly referenced to each other. This 
is a basic principle of programming. 
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6A: 

10 GRAPHICS 7:COLOR 1 
20 FOR X-l TO 80 
30 FOR Y-l TO 139 
40 PLOT X,Y 
30 NEXT Y 
60 NEXT X 

Error 141 says that the cursor in the program is out of range for the 
program—that is you have sent it off the screen and bombed the program. 
If you look at program 6A you'll see that you plotted Y (the row) to go up 
to 159 and it can only go up to 80. Here is a good example of a nested loop 
error. The program works the following way: 

1 —Plot the first X 

2— Plot the first 159 Y’s 

3— Plot the second X 

4— Plot the first 159 Y’s again 

5— Plot the third X 

6— Plot the first 159 Y's again 

etc. for 159 times through the loop. 
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This program never gets beyond the second step. It plots 1, Y for Y=1 
to 80 giving you the line on the left of the screen. As soon as it gets to the 
point 0.81 the cursor runs off the screen and you get the ERROR state¬ 
ment. It is essential to check the references of the points you plot in a 
program to be sure that they do not exceed the number of points in the 
Graphics mode you are using, especially in nested FOR/NEXT loops. 

6B: 

10 GRAPHICS 7:COLOR 1 
20 FOR X-l TO 139 
30 FOR Y-l TO 80 
40 PLOT X,Y 
30 NEXT Y 
60 NEXT X 

This is another FOR/NEXT loop trap. ERROR 13 says that there is no 
matching FOR statement for the last NEXT. This error is common enough 
to have a built-in error detector for it. What happens in this program that 
does not work is that: 

1— you begin with X=1 

2— and Y=1 

3— and plot 1.1 and 

4— go to the next X and plot 2,1 

5— and then go to the next X and plot 3,1 

6— and plot 4,1 all the way up to 159.1 

This gives you the horizontal line at the top of the screen. Once this 
line has been drawn, the program bombs. It has no way to get to the NEXT 
Y. The nested loops have not been ordered correctly. Whenever you nest 
loops in order to have two things working in conjunction, you have to 
structure the loops so that the first loop begins and ends the nesting, the 
second loop is second from the beginning and second from the end, etc. 
Nested loops are like sets of parentheses where each ( has to have a 
matching ). Here's how three nested loops would have to be structured to 
work: 

10 FOR X=1 TO 10 
20 FOR Y=1 TO 52 
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30 FOR 2-1 TO 5 

40 do something in the program 
50 NEXT Z 
G0 NEXT Y 
70 NEXT X 

The order in is XYZ and the order out is ZYX. It is a good programming 
habit to check for correct order in and out of nested loops. As you saw in 
our error program, if you don't do it the computer will automatically do it 
for you. It won't fix the error, however, so it’s best to check yourself. 
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T he puzzles in this section consist of a short program with one line all 
scrambled up. There is a screen dump accompanying each program so 
that you can tell what the program is supposed to do. An ERROR state¬ 
ment marks the scrambled line so you don’t have to figure out which is the 
problem line. Before you begin, here is an example of scrambled and 
unscrambled lines: 

Scrambled: 

50 Error 1 GOSUB TO:10FOR=X500XNEXT: 

Unscrambled: 

50 FOR X=1 TO 10:GOSUB 500: NEXT X 



- 1 - 

MULTIPLICATION 

We’ll start with a simple multiplication program. As you can see from the 
screen dump, the program gives you multiplication problems, as well as an 
opportunity to try again if you get the wrong answer. 


RUN 

HERE'S A SIMPLE MULTIPLICATION PROBLEM;;; 

5 TIMES 8 = 

? 3 S 

TRY AGAIN 
?40 

GOOD GOING! HERE ' S ANOTHER EXAMPLE: 

HERE * S A SIMPLE MULTIPLICATION PROBLEM;; 

4 TIMES 4 = 

?16 

GOOD GOING! HERE'S ANOTHER EXAMPLE: 

HERE'S A SIMPLE MULTIPLICATION PROBLEM; 


3 TIMES 3 = 


Here’s the scrambled program: 


10 PRINT "HERE'S A SIMPLE MULTIPLICATI 
ON PROBLEM" 

20 PRINT 

30 LET X-INT<RND<1>*10> 

40 LET Y-INT(RND<1)*10) 

50 PRINT X|" TIMES "|Y|" 

60 INPUT Z 

70 ERROR- XYZ#THEN100IFG0T0- 
80 PRINT "TRY AGAIN":GOTO 60 
lOO PRINT "GOOD GOING! HERE'S ANOTHER 
EXAMPLE:" 

110 GOTO 10 
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- 2 - 

DOUBLE SUN 

This is a graphics puzzle which plots a double sun on the screen. Each sun 
takes a turn drawing its rays, resulting in this image on the screen: 



Here is the scrambled program: 


lO GRAPHICS 7:COLOR 1 
FOR X-l TO 50 
PLOT 40,40 

ERROR- JRND0O))RND60(DRAMTO <*, *1 
NEXT X 

FOR Y-l TO 50 
70 PLOT 120,40 

00 DRAMTO RND(1)*79+80,RND <1> *80 
90 NEXT Y 
100 GOTO 20 


30 



- 3 - 

HOURS TO SECONDS 

This simple program converts hours to seconds. It asks you how many 
seconds there are in any number of hours. It won't ask for seconds in more 
than 10 hours since the calculating gets boring at that point. Nevertheless, 
it could: 


RIJN 

THERE ARE! 60 MX. MUTES IN AN 

THERE ARE & © SECONDS IN AN 

HOW MANY SECONDS ARE THERE 

?3690 

AB50LUTLEY! 

READY 
RIJN 

THERE ARE 
THERE ARE 


6O MXNOTES 
60 SECONDS 
HOW MANY SECONDS ARE 

?12400 
NOT QUITE. 

225206 
ABSOLUTEEY! 

READY 


X N AN 
IN AN 

THERE 


HOUR . 

MINUTE. 

IN 1 HOURS?;! 


HOUR . 
MINUTE. 
x: N 7 HOUR* 


Here's the scrambled program: 


10 PRINT "THERE ARE 60 MINUTES IN AN H 
OUR. H 

20 PRINT "THERE ARE 60 SECONDS IN AN M 
INUTE. ■ 

30 LET X-INT<RND<1)*10>+1 

40 PRINT "HON MANY SECONDS ARE THERE I 

N "|XJ" HOURS?" 

50 INPUT Y 

60 ERROR- PRINT'THEN!END"60ABS0LUTEL 

Y60*IF*X"SY 

70 PRINT "NOT QUITE.":GOTO 50 


31 



- 4 - 

TIMED CALCULATIONS 

This program sees if you can do some simple number manipulation under 
some time pressure. It mixes multiplication with simple addition by asking 
you to add 1 to your times answer. Of course, any number could be added 
and the challenge could be made more complex: 


CAN YOU CALCULATE QUICKLY? 

LET'S SEE. 

WHAT XS.. 

C 2 T X ME S 93 + .1 = 

WHAT IS YOUR ANSWER? 

2X2 

TRY AGAIN. 

WHAT IS YOUR ANSWER? 

?19 

YOU GOT IT ■ ? » ! 

READY 


Here is the scrambled program: 


10 PRINT "CAN YOU CALCULATE QUICKLY?" 
20 PRINT "LET'S SEE." 

30 PRINT 

40 PRINT "WHAT IS.." 

50 LET X»INT<RND<1>*50> 

60 PRINT 

70 ERROR- *||”-"+"PRINT2XTIMES) <1 
SO FOR Z-l TO 1500:NEXT Z 
90 PRINT 

lOO PRINT " WHAT IS YOUR ANSWER?" 

110 INPUT Y 

120 IF Y-<2*X)+1 THEN PRINT "YOU GOT I 
T!!!!"SEND 

130 PRINT "TRY AGAIN.":GOTO 100 
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- 5 - 

A SIMPLE NUMBER GAME 

This is a simple number comparison game for young children. It asks 
whether one number is greater than another. If you look closely at the 
program you'll see that the computer will never select two equal numbers. 
It teaches the use of < and >. 


RUN 

HERE*5 A 5IMPLE NUMBER GAME: 

X S 1.0 GREATER DR LE55 THAN 7’ 

TYRE > IF XT X S GREATER AND < 
LESS 
?> 

YOU GOT XT 

READY 

RUN 

HERE'S A SIMPLE NUMBER GAME : 
IS 10 GREATER OR LESS THAN 11 


tyre: > 
LESS 


XF IT IS GREATER AND 


IE IT IS:: 


XT' IT I Si: 


Here is the scrambled program: 

10 PRINT "HERE'S A SIMPLE NUMBER GAME: 

M 

20 ERROR- -XRND<INT)20<+LET>*1 

30 IF X-IO THEN GOTO 20 

40 PRINT "IS 10 GREATER OR LESS THAN " 

IX 

50 DIM At(1) 

60 PRINT 

70 PRINT "TYPE > IF IT IS GREATER AND 
< IF IT IS LESS" 

80 INPUT At 

90 IF X<10 THEN GOTO lOOO 

100 IF X>10 THEN GOTO 2000 

lOOO IF At«">" THEN PRINT "YOU GOT IT" 

: END 

1010 PRINT "SORRY. TYPE RUN AND TRY A 

GAIN IF YOU LIKE.":END 

2000 IF At«"<" THEN PRINT "YOU GOT IT" 

:end 

2010 PRINT "SORRY. TYPE RUN AND TRY A 
GAIN IF YOU LIKE."SEND 
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- 6 - 

MINUTE/DAY CONVERSION 

Here's a minute/day conversion program that tells you how many minutes 
there are in any number of days. It does not quiz you. but answers your 
question instead: 


RUN 

HERE'5 A PROGRAM THAT WILL TELL 
YOU HOW MANY MINUTES THERE ARE IN 

ANY NUMBER OF DAYS. 


DAYS ? 


HOW MANY 

?3 

THERE ARE 43X0 MXMUTES IN 3 DAYS 
DO YOU WANT TO CHANGE THE NUMBER OF 

DAYS? 

?YE5 

HOW MA NY DAYS? 

?7 

THERE ARE! 10080 MINUTES XN 7 DAYS 
DO YOU WANT TO CHANGE THE NUMBER OE 

DAYS? 

?NO 

READY 


Here is the scrambled program: 

10 PRINT "HERE'S A PROGRAM THAT WILL T 
ELL" 

20 PRINT "YOU HOW MANY MINUTES THERE A 
RE IN" 

30 PRINT "ANY NUMBER OF DAYS." 

40 PRINT 

50 PRINT "HOW MANY DAYS?" 

60 CLR 
70 INPUT X 
80 GOSUB 500 

90 PRINT "DO YOU WANT TO CHANGE THE NU 
MBER OF DAYS?" 

100 DIM A*(3) 

HO INPUT A* 

120 IF A*~"YE8" THEN GOTO 50 
130 END 
500 PRINT 

510 ERROR- X"H60|*PRINT"THERE*MINUT 
ES*DAYS M "IN M ARE"124 

520 RETURN 
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- 7 - 

QUICK ADDITION 

This puzzle challenges you to add a string of six numbers together quickly: 


RUN 

HERE 15 A LI5T OF NUMBERS 

TRY TO ADD- THEM TOGETHER O UICKLY 

4 2 9 8 8 2 

WHAT XS YOUR ANSWER 

?Z5 

TRY ONCE MORE. 

?3i 

TRY ONCE MORE. 

YOU'ME GOT XT. 

READY 


Here is the scrambled program: 


10 PRINT "HERE IS A LI8T OF NUMBERS" 

20 PRINT "TRY TO ADD THEM TOGETHER QUI 
CKLY" 

30 FOR Z-l TO lOOOtNEXT Z 
40 DIM A (6) 

SO FOR X“1 TO 6 

60 ERROR- AX(((RNDINT)Z))10*™ 

70 PRINT A(X)I" "I 
80 NEXT X 

90 FOR Z-l TO 2000:NEXT Z 
100 PRINT 

110 PRINT "WHAT IS YOUR ANSWER" 

120 INPUT Y 

130 IF Y-A<l>+A<2>+A<3>+A<4)+A<5)+A<6> 
THEN PRINT "YOU'VE GOT IT.":END 
140 IF Y< >A 11) +A (2) +A (3) +A<4> +A<3) +A (6 
) THEN PRINT "TRY ONCE MORE.GOTO 120 
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DOT COUNTING 

This is a dot counting game. 


HOM MANY DOTS ARE ON THE""sCREEM? 
YOUR GUESS? ?1 


Here is the scrambled program: 


10 GRAPHICS 7:COLOR 1 

20 PRINT "HOW MANY DOTS ARE ON THE SCR 
EEN?" 

30 LET X"INT<RND(1)#15)+1 
40 LET W-5 
50 FOR Y-l TO X 
60 PLOT Wf 40 
70 ERROR- 5WW-LET+ 

80 NEXT Y 

90 PRINT "YOUR GUESS?"! 
lOO INPUT Z 

110 IF Z-X THEN PRINT "EXACTLY!!!":END 
120 PRINT "COUNT AGAIN_":GOTO 100 
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RIDICULOUS 

This program can print the word "RIDICULOUS”—any number of times— 
perhaps a ridiculous venture but one whose structure is used in some 
programming contexts: 


R II N 

MOW MANY TIMES MOULD YOU LIKE ME TO 
PRINT YOUR NAME OR ANY OTHER WORD? 


HH 

A 

T 


140 

R 

D 


140 

u 

L 

D 


Y 

O 

u 


L 

X 
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E 


ME 
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o 
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R 

X 

D 

X 

c 

U 


READY 


Here is the scrambled program: 


10 PRINT "HOW MANY TINES WOULD YOU LIK 
E ME TO" 

20 PRINT "PRINT YOUR NAME OR ANY OTHER 
WORD?" 

30 INPUT X 

40 PRINT "WHAT WORD WOULD YOU LIKE ME 
TO PRINT "|X|" TIMES?" 

30 DIM At (30) 

60 INPUT At 
70 ERROR- 'XTOIYFOR 
80 PRINT At|" "| 

90 NEXT Y 
lOO END 
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- 10 - 

BARBER S PARADOX 

This little scramble is a version of the classical Barber's Paradox: There is a 
barber in a town who shaves all and only people in the town who don't 
shave themselves. Does he shave himself? 

I've taken the paradox to school you might say: 


RUN 

•JULIA IS A KIND AND LOVELY PERSON. 

SHE DOES HOMEWORK FOR ALL AND ONLY 

PEOPLE WHO DON'T DO HOMEWORK FOR 

THEMSELVES. 

DOES JULIA DO HER OWN HOMEWORK? 

?YE5 

THEN SHE DOESN'T DO IT. 

JULIA IS A KIND AND LOVELY PERSON. 

SHE DOES HOMEWORK FOR ALL AND ONLY 

PEOPLE WHO DON'T DO HOMEWORK FOR 

THEMSELVES. 

DOES JULIA DO HER OWN HOMEWORK? 

? N O 

THEN SHE DOES DO IT. 

JULIA IS A KIND AND LOVELY PERSON. 

SHE DOES HOMEWORK FOR ALL AND ONLY 

PEOPLE WHO DON'T DO HOMEWORK FOR 

THEMSELVES. 

DOES JULIA DO HER OWN HOMEWORK? 

?■ 


10 PRINT -JULIA IS A KIND AND LOVELY P 
EPSON. " 

20 PRINT -SHE DOES HOMEWORK FOR ALL AN 
D ONLY" 

30 PRINT -PEOPLE WHO DON'T DO HOMEWORK 
FOR" 

40 PRINT -THEMSELVES.- 

50 PRINT -DOES JULIA DO HER OWN HOMEWO 
RK?- 
60 CLR 
70 DIM At(3) 

80 INPUT At 

90 ERROR- /O-.THENGOTO-At-DOESN'TIF” 
SHEYESS PRINT-ITDOTHEN 

100 IF At- H N0“ THEN PRINT -THEN SHE DO 
ESN'T DO IT.":GOTO 10 
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Answers 


i 


10 PRINT “HERE'S A SIMPLE MULTIPLICATJ 
ON PROBLEM" 

20 PRINT 

30 LET X«INT<RND<1>*10> 

40 LET Y"INT(RND<1>*10) 

50 PRINT X|“ TIMES "|Y|" -" 

60 INPUT Z 

70 IF Z-X*Y THEN GOTO 100 
SO PRINT “TRY AGAIN":GOTO 60 
10O PRINT "GOOD GOING! HERE'S ANOTHER 
EXAMPLE:“ 

110 GOTO 10 


As you can see, line 70 (the scrambled line) checks for correct answers 
using the variable Z which is the answer you input If Z=X*Y then you got 
the program and are sent to line 100 for congratulations and a chance at 
another example. If Z < > X*Y the program moves to line 80 which sends 
you back to the problem you missed. This little technique can be incorpo¬ 
rated in games where you want to give people many chances to answer a 
question as well as generate new questions. 


2 


10 GRAPHIC8 7:COLOR 1 
20 FOR X-l TO SO 
30 PLOT 40,40 

40 DRAMTO RND(1> *80,RND <1)*80 
SO NEXT X 
60 FOR Y-l TO 50 
70 PLOT 120,40 

BO DRAWTO RND <1)*79+80,RND(1)*80 
90 NEXT Y 
100 GOTO 20 
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The scrambled line 40 is a DRAWTO statement, one of the most 
powerful Graphics commands in Atari BASIC. It selects random points on 
the left side of the screen (half the screen is approximately 80 columns long 
and 80 columns wide) and draws from the center point of that halfscreen 
to the chosen random point. This double sun effect is a good way to dress 
up the ending of a game. 


3 


10 PRINT "THERE ARE 60 MINUTES IN AN H 
OUR. " 

20 PRINT "THERE ARE 60 SECONDS IN AN M 
INUTE.■ 

30 LET X“INT(RND<1)*10)+1 

40 PRINT "HOW MANY SECONDS ARE THERE I 

N XI" HOURS?" 

50 INPUT Y 

60 IF Y-X*60*60 THEN PRINT "ABSOLUTLEY 
!":END 

70 PRINT "NOT QUITE.":GOTO 50 


The key to unscrambling this puzzle is to know that you calculate the 
number of seconds in an hour using the formula X (the number of 
hours)*60*60 which is the conversion formula. This form of program can 
be changed to ask about converting feet or miles to inches, meters to 
centimeters, etc. It is a simple and generalizable form of a conversion quiz 
program. 
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10 PRINT "CAN YOU CALCULATE QUICKLY?" 
20 PRINT "LET'S SEE." 

30 PRINT 

40 PRINT "WHAT IS.." 

50 LET X*INT(RND<1)*50) 

60 PRINT 

70 PRINT "<2 TIMES "|X|"> +1-" 

BO FOR Z-l TO 1500:NEXT Z 
90 PRINT 

lOO PRINT " WHAT IS YOUR ANSWER?" 

110 INPUT Y 


40 


120 IF Y-<2*X>+1 THEN PRINT “YOU GOT I 
T!!!!“:END 

130 PRINT “TRY AGAIN.":OOTO lOO 

This is simply an unscrambling of the integer random number function 
in Atari BASIC. Many beginning programmers confuse RND(1)*X, which 
gives a decimal answer, with INT (RND( 1 )*X) which gives an integer. There 
are times when having integers is essential to a game or program. Also, it is 
important to pay attention to the placement of parentheses in the INT 
statement. A simple mistake like INT(RND(1 ))*X can cause quite a mess. 
Try to figure out the different effects of INT(RND( 1 ))*6 and INT(RND( 1 )*X). 
What you will see is the result of the fact that INT(RND(1)) is always 0. 


5 


10 PRINT "HERE'S A SIMPLE NUMBER SAME: 

M 

20 LET X«INT<RND<1>*20) 

30 IF X-10 THEN GOTO 20 

40 PRINT "IS 10 GREATER OR LESS THAN " 

» X 

50 DIM A*<1> 

60 PRINT 

70 PRINT "TYPE > IF IT IS GREATER AND 
< IF IT IS LESS" 

80 INPUT A* 

90 IF X<10 THEN GOTO lOOO 

lOO IF X>10 THEN GOTO 2000 

lOOO IF A*-">" THEN PRINT "YOU GOT IT" 

SEND 

1010 PRINT "SORRY- TYPE RUN AND TRY A 
GAIN IF YOU LIKE."SEND 

2000 IF A*-"<" THEN PRINT "YOU GOT IT" 

SEND 

2010 PRINT "SORRY- TYPE RUN AND TRY A 
GAIN IF YOU LIKE."SEND 

The key to unscrambling this is to figure out that there is only one 
variable in this challenge. (2*X)+1 is the major part of the reconstruction of 
the scrambled line. There are also some syntactical tricks that have to be 
mastered to use the PRINT statement with variables. You can print a 
variable along with words or other numbers but variables do not go in 
quotes as in this line: 
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10 PRINT X*Y 


and in this more complex line: 

10 PRINT Y; 

Note that the = is not a variable and has to be enclosed in quotes. 
This program can be modified for practice in the kind of calculations 
that are common in beginning algebra. For example, it can take the form: 

What is ((2*X)-(5*Y)) 2? 


6 


10 PRINT -HERE'S A PROGRAM THAT WILL T 
ELL" 

20 PRINT "YOU HOW MANY MINUTES THERE A 
RE IN- 

30 PRINT "ANY NUMBER OF DAYS." 

40 PRINT 

50 PRINT "HOW MANY DAYS?" 

60 CLR 
70 INPUT X 
80 GOSUB 300 

90 PRINT "DO YOU WANT TO CHANGE THE NU 
MBER OF DAYS?" 

100 DIM At<3) 

110 INPUT A* 

120 IF A*""YES" THEN GOTO 50 
130 END 
500 PRINT 

510 PRINT "THERE ARE "|X*60*24|" MINUT 
ES IN "IX|" DAYS" 

520 RETURN 


Line 510 combines calculation with printing and, like the previous 
conversion puzzle (number 3), can be used to perform many different types 
of conversions. In unscrambling this, the thing to watch for is the place¬ 
ment of quotes and semicolons. A misplaced quote or semicolon can des¬ 
troy the entire program. 
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7 


10 PRINT "HERE IS A LIST OF NUMBERS" 

20 PRINT "TRY TO ADD THEM TOGETHER QUI 
CKLY" 

30 FOR Z-l TO lOOO:NEXT Z 
40 DIM A <6) 

30 FOR X-l TO 6 

60 A(X)—INT(RND(1)*10) 

70 PRINT A <X)I" "» 

80 NEXT X 

90 FOR Z-l TO 2000:NEXT Z 
lOO PRINT 

110 PRINT "WHAT IS YOUR ANSWER" 

120 INPUT Y 

130 IF Y—A (1) +A (2) +A (3) +A (4) +A (3) +A <6) 
THEN PRINT "YOU'VE GOT IT.":END 
140 IF Y<>A<1) +A12)+A(3)+A(4)+A(3)+A<6 
) THEN PRINT "TRY ONCE MORE.":GOTO 120 


This program makes use of a powerful aspect of Atari BASIC—the 
array. A(X) is dimensioned on line 40 to contain six numbers. The scrambled 
line 60 places a random integer between 0 and 10 in each position. That 
way. lists of numbers can be generated and used as in this program. Begin¬ 
ning and intermediate programmers should take advantage of the ability to 
store and use lists that this function provides. For examples of the use of 
arrays see your Atari BASIC Reference Manual or look up arrays in a text 
if you are not already familiar with them. 
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lO GRAPHICS 7:COLOR 1 

20 PRINT "HOW MANY DOTS ARE ON THE SCR 
EEN7- 

30 LET X-INT<RND<1)*15>+1 

40 LET W-3 

30 FOR Y-l TO X 

60 PLOT N p 40 

70 LET W-N+3 

80 NEXT Y 

90 PRINT "YOUR GUESS?"» 

100 INPUT Z 

110 IF Z-X THEN PRINT "EXACTLY!H":END 
120 PRINT "COUNT AGAIN_"SGOTO 100 
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The LET W=W+5 statement represents a very powerful self¬ 
incrementing process that is often used in computer programs. For exam¬ 
ple, a simple program 

10 LET X=0 
20 FOR Y=1 TO 100 
30 LET X=X+1:PRINT X 
40 NEXT X 

will give you all the numbers from 1 to 100. if line 39 were changed to 
30 LET X=X+2:PRINT X 

you would get the numbers from 2 to 100 counting by twos. This can give 
you great control over how to change the variables in your programs. In the 
case of the program in this puzzle, W=W+5 was used to draw points that 
were five points apart so that they would be seen as distinct on the screen. 


9 


10 PRINT “HOW MANY TIME8 WOULD YOU LIK 
E ME TO- 

20 PRINT -PRINT YOUR NAME OR ANY OTHER 
WORD?" 

30 INPUT X 

40 PRINT -WHAT WORD WOULD YOU LIKE ME 
TO PRINT "|X|- TIME8?" 

30 DIM At<50> 

60 INPUT A* 

70 FOR Y-l TO X 
80 PRINT A4|- 
90 NEXT Y 
100 END 


This is a scramble of the FOR statement of the FOR/NEXT loop used 
in the program to produce the ridiculous repetition. Notice that the number 
of times through the loop (the X variable) changes each time you run the 
program. Most beginning programmers use fixed loops like FOR X=1 TO 
59, but sometimes it is more useful to change the number of times 
through the loop as the program is running. 
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10 


10 PRINT “JULIA IS A KIND AND LOVELY P 
EPSON. M 

20 PRINT "SHE DOES HOMEWORK FOR ALL AN 
D ONLY" 

30 PRINT "PEOPLE WHO DON'T DO HOMEWORK 
FOR" 

40 PRINT "THEMSELVES." 

30 PRINT "DOES JULIA DO HER OWN HOMEWO 
RK?" 

60 CLR 
70 DIM A*<3> 

80 INPUT A* 

90 IF A*-"YES" THEN PRINT "THEN SHE DO 
ESN'T DO IT."SGOTO 10 

lOO IF A*-"NO" THEN PRINT "THEN SHE DO 
ES DO IT."5GOTO 10 


The scrambled line 90 as well as line 100 make the paradox continue 
until you are bored and shut down the computer. However, the lines 
illustrate a technique you can add to many of the games and quizzes in this 
section. It will allow them to run many times instead of ending after just 
one play. Here’s a very simple example: 

10 PRINT 4 4 WHRT NUMBER IS THIS” 

20 X = INT(RND(1)#20) 

25 PRINT X 
30 INPUT V 

40 IF X = Y THEN PRINT 4 4 GRERT’ ’ :GOTD 10 
50 IF X < > Y THEN PRINT 4 4 TRY RGRIN’ ’ :GQTO 30 
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T he puzzles in this section leave all the code in a program intact. All they 
do is scramble the line numbers. These numbers are not scrambled 
according to any pattern so there is no use trying to solve the puzzles by 
trying to figure out a pattern for transforming the line numbers. You have 
to pay attention to the screen dumps and try to put a program structure 
together that will do what the illustrations show. 

Scrambling line numbers of even the simplest programs can destroy 
them. For example, take this two-line program: 

10 PRINT "HO HO HO!'"'; 

20 GOTO 10 

This will fill the screen up with a jolly greeting. Reverse the line numbers 
and you get: 

10 GOTO 10 

20 PRINT "HO HO HO!'"; 

This program will lock up at line 10 and stay there until you press the 
BREAK key. Nothing will happen. In the simplest way. this is an illustration 
of the importance of program structure in BASIC. Now for the puzzles. 
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- 1 - 

HERE COMES THE SUN 

This program shines and lets us know endlessly that the sun is coming and 
filling up the screen. Here is a picture of what the program does and a 
scrambled version of the program. Unscramble the program and, if you feel 
like it, make it fancier. 



10 FOR X-l TP 75:NEXT X 
20 GOTO 20 

30 GRAPHICS 7:COLOR 1 
40 PRINT "HERE COMES THE SUN 14 1 
50 DRAMTO RND <1)*159,RND(1)*80 
60 PLOT 0,0 
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- 2 - 

THERE GOES THE DRUNK 

This is a simple variant on Puzzle 1 that produces a completely different 
result. You should be able to think through the difference and reconstruct 
the program that ambles with the drunk. 



10 DRAWTO RND(1)*199,RND<1)*80 
20 GOTO 30 

30 PRINT "THERE GOES THE DRUNK"! 
40 GRAPHIC8 7:COLOR 1 
90 FOR X-l TO lOO:NEXT X 
60 PLOT 0,0 
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A POETIC SCRAMBLE 

Here is a little poem with some input about the weather. The input, 
combined with the poem, should help you reassemble the scrambled 
program. 


RUN 

MOW 15 THE WEATHER TODAY? 
?LOU5Y 

WELL, WHETHER YOU LIKE IT 
OR WHETHER NOT 
LOUSY WEATHER 

IS THE ONLY KIND OE WEATHER 
WE GOT. 

READY 


10 PRINT A*|" WEATHER" 

20 PRINT "WELL, WHETHER YOU LIKE IT" 

30 INPUT A* 

40 PRINT "IS THE ONLY KIND OF WEATHER" 
30 DIM A* (50) 

60 PRINT "OR WHETHER NOT" 

70 PRINT "WE GOT." 

60 PRINT 

90 PRINT "HOW IS THE WEATHER TODAY?" 
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- 4 - 

WHERE AM I? 

This program allows you to plot a point on the screen in Graphics 7 and see 
the point on the screen. When unscrambled, it is a good way to become 
familiar with the positions on the screen. 


ROW CO TO 79) 
COLUMN 

. 


CO TO JL595 


10 GOTO 20 
20 INPUT B 

30 PRINT -ROW (O TO 79)" 

40 PLOT A,B 

50 PRINT "COLUMN (O TO 159) 
60 GRAPHICS 7:COLOR 1 
70 INPUT A 
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A LITTLE DIFFERENT ORDER 

Here is a scrambled program and what it does when you run it: 


RUM 
?56 
DON 
GIM 
THE 
I A 
THA 
?37 
FIR 
REA 


T ASK ME WHY . PL. EASE 
E ME TWO NUMBERS TO ADD. 
ANSWER IS A GLORIOUS 50 

CRAZY ABOUT ADDING BUT 

NK YOU. THAT WAS DELICIOUS! 


ST 
D Y 


NUMBER-SECOND NUMBER 


Here is the scrambled program and a dump of what the unscrambled 
program is supposed to do. What is the unscrambled program? 


I O I! S ! 
O 

READY 


RUN 

I AM CRAZY ABOUT ADDING BU 

DON’T ASK ME WHY. PLEASE 
GIVE ME TWO NUMBERS TO ADD 
FIRST N U MB ER-?34 
SECOND NUMBER-?56 
THANK YOU. THAT WAS DELIC 

THE ANSWER IS A GLORIOUS S 
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10 INPUT X 

20 PRINT “DON'T ASK ME WHY. PLEASE 11 
30 PRINT "GIVE ME TWO NUMBERS TO ADD.* 1 
40 PRINT "THE ANSWER IS A GLORIOUS "|X 
+Y 

50 PRINT "I AM CRAZY ABOUT ADDING BUT" 
60 PRINT "THANK YOU. THAT WAS DELICIO 
US! • 

70 INPUT Y 

80 PRINT "FIRST NUMBER-"! 

90 PRINT "SECOND NUMBER-"! 




- 6 - 

CAN YOU COUNT? 

This program picks a number and asks you what comes next. 


RUN 

WHAT NUMBER COMES AFTER 2 

24 

TRY AGAIN. YOU CAN DO ITM ! 

26 

TRY AGAIN. YOU CAN DO XT!!! 

23 

RIGHT ON ! ! ! 

READY 


lO PRINT -WHAT NUMBER COMES AFTER M jX 
20 IF YOX+1 THEN PRINT "TRY AGAIN. Y 
OU CAN DO IT!!!* 

30 LET X*INT(RND <1)*11> 

40 IF Y-X+l THEN PRINT "RIGHT ON!!!":E 
ND 

30 GOTO 30 
60 INPUT Y 
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- 7 - 

NEXT LETTER 

This program is supposed to ask what letter comes next in the alphabet 
after one chosen by the computer. When scrambled, here is what it does: 


RUN 

OTH XN THE ALPHABET? 

ERROR- ^ AT LINE 26 


Here is the scrambled program and a screen dump of it running 
unscrambled: 


RUN 

WHAT LETTER COMES 5TH XN THE ALPHABET?! 

?i> HI! 

GUESS AGAIN 
? E 

RIGHT 


REAI>Y 
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10 PRINT X|"TH IN THE ALPHABET?” 

20 INPUT Bt 

30 PRINT "GUESS AGAIN" 

40 PRINT "WHAT LETTER COMES 

50 IF A*<X f X)-B* THEN PRINT "RIGHT":EN 

D 

60 A*«"ABCDEFGHIJKLMNOPQRSTUVWXY2" 

70 DIM B*<1) 

80 GOTO 70 
90 DIM A*<26> 

100 LET X*INT(RND<1)*26)+1 


NAME NAME 


This program in Graphics 2 asks for your name and then prints it out 12 
times in large letters. Graphics 2 is nice for bold statements. Here is what 
the program looks like on the screen and the scrambled version of the 
program. Put it together and print the names of your family and friends. 
(Joshua is my son's name.) 


.... WHAT IS YOUR HOME? 

:|Hi JOSHUA 

:||| WHAT A NICE HA ME! 

Ill JOSHUA JOSHUA JOSHUA 

joshua joshua joshu iSi: 

!: A JOSHUA JOSHUA JOSH ; 
; §!ll UA JOSHUA JOSHUA JOS i: T 

lipll H U A 

? JOSHU a 
iljjipiii READY 


10 PRINT «6*A* 

20 FOR Z-l TO 12 
30 DIM A*(SO) 

40 PRINT #6j"WHAT IS YOUR NAME?" 
50 PRINT #6|A*J" 

60 PRINT #6j"WHAT A NICE NAME!" 
70 NEXT Z 

80 GRAPHICS 2:COLOR 1 
90 INPUT A* 
lOO PRINT #6 
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MEDITATION 

A screen dump can hardly capture this program which cycles through all of 
the colors and luminances of the Atari computer while slowly drawing a 
starburst. The program keeps on changing but slowly enough to allow you 
to relax and look. Here's an inadequate black and white dump of the 
program as well as the scrambled program: 



10 NEXT X 

20 DRAWTO RND<1)*139,RND<1>»80 
30 PLOT 80,40 
40 GRAPHICS 2 
30 GRAPHICS CLR 

60 PRINT "HERE ARE SOME COLORS FOR" 

70 SOTO 10 

80 FOR Y-l TO 73:NEXT Y 
90 SETCOLOR 4,RND(1)*16,RND(1)*13 
100 FOR X-l TO 50 

110 PRINT -MEDITATION AND RELAXATION" 
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AN OPTIMISTIC PSYCHIATRIST'S 
PROJECTIVE TEST 

This test asks you for a color preference. All the responses are in full color 
and are positive because the psychiatrist that taught me the test never 
found a person she didn’t believe in. The black and white can't show you the 
passionate red. the sky blue, or the bright yellow but your Atari can. Try to 
unscramble the program and then add color upon color until you can make 
positive statements corresponding to all the 128 colors and luminances 
that you can control on the Atari. Finding 128 positive statements will be a 
good exercise in itself, whether you can unscramble the program or not. 


RUN 

WHICH OF THESE THREE COLORS IS VOUR 
FAVORITE. 

RED BLUE VELLOW 

?RED| 


YOU ARE 
PASSIONATE 


60 























THE SKY 
IS THE LIMIT 


YOU SHINE 
WITH JOY 


10 PRINT #6*" WITH JOY” 

20 IF D«-B* THEN GOTO 2000 
30 POSITION 0,3 
40 SETCOLOR 0,13,14 
50 PRINT #6|" THE SKY" 

60 GRAPHICS 2 

70 DIM A*<10> ,B#dO) ,C*<10> ,D*(10> 

80 PRINT #6|" IS THE LIMIT" 

90 END 

1O0 PRINT #6J" YOU ARE" 

lOOO PRINT " RED BLUE YELL 

OW" 

1010 PRINT #6»" YOU SHINE" 
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1020 A*«"RED”:B*«"BLUE"!C*-"YELLOW” 

1030 SETCOLOR 0,4,7 

1040 POSITION O f 3 

1090 END 

2000 GRAPHICS 2 

2010 PRINT "FAVORITE." 

2020 IF D*-A* THEN GOTO lOOO 

2030 PRINT “WHICH OF THESE THREE COLOR 

S IS YOUR” 

2040 PRINT #A|" PASSIONATE" 

2090 END 

3000 GRAPHICS 2 

3010 IF D*-C# THEN GOTO 3000 

3020 INPUT D* 

3030 PRINT 

3040 SETCOLOR 0,8,7 

3090 POSITION 0,3 
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Answers 


i 


lO GRAPHICS 7:COLOR 1 
20 PLOT 0,0 

30 DRAWTO RND<1)*159,RND(1)*80 
40 PRINT "HERE COMES THE SUN"| 
50 FOR X«1 TO 75:NEXT X 
60 GOTO 20 


In Graphics programs, especially those with GOTO statements and 
loops, which line the GOTO refers to and the position the Graphics state¬ 
ment plays within the loop are essential. In fact, try this program with the 
following simple line change and see what happens: 

60 GOTO 10 


2 


10 GRAPHICS 7:COLOR 1 
20 PLOT 0,0 

30 DRAWTO RND < 1) *159, RND (1) *00 
40 PRINT "THERE GOES THE DRUNK"| 
30 FOR X-l TO 100:NEXT X 
60 GOTO 30 


Compare the unscrambled version of this program with that of Puzzle 
1. Notice that, once again, a simple change in the reference of a GOTO 
statement totally changes the nature of the program results. 
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3 


10 PRINT "HOW IS THE WEATHER TODAY?" 

20 DIM A*(SO) 

30 INPUT A* 

40 PRINT 

50 PRINT “WELL, WHETHER YOU LIKE IT" 

60 PRINT “OR WHETHER NOT" 

70 PRINT A*|“ WEATHER" 

80 PRINT "IS THE ONLY KIND OF WEATHER" 
90 PRINT “WE SOT." 


Almost any saying can be turned into a fun program using this form. 
Try an input to the following: 

Too many X's spoil the Y. 

An X in time saves Y. 

Better X than Y. 


4 


10 GRAPHICS 7:COLOR 
20 PRINT M COLUMN (O 
30 INPUT A 
40 PRINT "ROW <0 TO 
50 INPUT B 
60 PLOT A, B 
70 GOTO 20 


1 

TO 159)" 
79) " 


After you understand how this program works, try to do it in the 
different Atari Graphics modes. It is a good way to become familiar with the 
variety of screens the Atari allows you to use in your programs. 
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5 


10 PRINT 
20 PRINT 
30 PRINT 
40 PRINT 
30 INPUT 
60 PRINT 
70 INPUT 
SO PRINT 
US!" 

90 PRINT 
+Y 


"I AM CRAZY ABOUT ADDING BUT" 
"DON'T ASK NE WHY. PLEASE" 
"GIVE ME TWO NUMBERS TO ADD." 
"FIRST NUMBER-"? 

X 

"SECOND NUMBER-"! 

Y 

"THANK YOU. THAT WAS DELICIO 
"THE ANSWER IS A GLORIOUS "!X 


Of course, this program can easily be extended to multiplication. See if 
you can get a bit more complex and extend it to division so the answer 
comes out even and to subtraction so the answer comes out positive. This 
will require a few more lines of code guaranteeing these conditions. 


6 


10 LET X-INT(RND<1>*11> 

20 PRINT "WHAT NUMBER COMES AFTER "|X 
30 INPUT Y 

40 IF Y-X+l THEN PRINT “RIGHT ON!!!“:E 
ND 

SO IF YOX+1 THEN PRINT "TRY AGAIN. Y 
OU CAN DO IT!!!" 

60 GOTO 30 


Here are some interesting modifications: 


Can you tell me what 5 times X is? 

Can you tell me what 5 times X divided by 3 is? (In this case set the 
program up so that the answer comes out even.) 
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7 


lO DIM A*(26) 

20 A*“"ABCDEF6HIJKLMNOPQRSTUVWXY Z" 

30 LET X“INT (RND (1) #26) +1 
40 PRINT "WHAT LETTER COMES "J 
SO PRINT X|“TH IN THE ALPHABET?" 

60 DIM B«(l> 

70 INPUT B* 

80 IF A*(X,X)-B* THEN PRINT "RIGHT":EN 
D 

90 PRINT "GUESS AGAIN" 
lOO GOTO 70 


Notice that the alphabet is stored in this program in A$ which was 
dimensioned to hold 26 letters: DIM A$(26). Also notice that the key to 
the program is the powerful BASIC command A$(X,X) which allows you to 
choose the Ath member of A$. This is used in many code and word pro¬ 
grams. In its more complex form it has two variables A$(X,Y) which will 
allow you to use all the members of A$ from X to Y. Thus, if A$ contained 
the alphabet then A$(X,Y) could have X=2 and Y=5 as values. It would 
become A$(2,5) and the command 10 PRINT A$(2,5) would result in the 
computer printing out: 

BCDE 


8 


10 GRAPHICS 2:COLOR 1 

20 PRINT #6f"WHAT IS YOUR NAME?" 

30 DIM A*<50> 

40 INPUT A* 

50 PRINT #6JA* 

60 PRINT #6I M WHAT A NICE NAME!” 

70 PRINT #6 

80 FOR Z-l TO 12 

90 PRINT #6|A*|” 

lOO NEXT Z 
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9 


10 GRAPHICS 7 

20 PRINT "HERE ARE SOME COLORS FOR" 
30 PRINT "MEDITATION AND RELAXATION" 
40 SETCOLOR 4,RND(1)*16,RND<1>*13 
50 FOR X=1 TO 30 
60 PLOT 80,40 

70 DRAWTO RND <1)*139,RND(1)*80 

80 FOR Y-l TO 75:NEXT Y 

90 NEXT X 

lOO GRAPHICS CLR 

110 GOTO 10 


Play with the Atari SETCOLOR command and Graphics can provide 
beautiful effects even for the beginning programmer. Try to change the 
colors, the luminances, and the pauses that keep the color on the screen. 
(This is done with empty FOR/NEXT loops like FOR X=1 TO 100:NEXT X 
which is empty since it tells you to do nothing during those cycles.) You can 
get pretty good at experimenting with these powerful ideas built into the 
BASIC of the Atari. 


10 


10 DIM A*<10) ,B*<10> ,C*<10> ,D*<10) 

20 A*-* M RED": B*«"BLUE": C*-” YELLOW” 

30 PRINT "WHICH OF THESE THREE COLORS 
IS YOUR M 

40 PRINT "FAVORITE." 

50 PRINT 

60 PRINT " RED BLUE YELLOW 

M 

70 INPUT D* 

80 IF D«-A* THEN GOTO lOOO 

90 IF D*“B* THEN GOTO 2000 

lOO IF D*-C* THEN GOTO 3000 

lOOO GRAPHICS 2 

1010 SETCOLOR 0,4,7 

1020 POSITION 0,3 

1030 PRINT *61" YOU ARE" 

1040 PRINT #6|“ PASSIONATE" 

1050 END 

2000 GRAPHICS 2 

2010 SETCOLOR 0,8,7 
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2020 POSITION 0,3 

2030 PRINT #61 M THE SKY 11 

2040 PRINT #6|" IS THE LIMIT" 

2030 END 

3000 SRAPHICS 2 

3010 BETCOLOR 0,13,14 

3020 POSITION 0,3 

3030 PRINT #6|" YOU SHINE" 

3040 PRINT #6|" WITH JOY" 

3050 END 


Here are a few color character equivalents I’ve managed to come up 

with: 

orange—abundant and nourishing 
pink—shy but perceptive 
dark blue—deep and curious 
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I n these puzzles, one line is missing from the programs. The missing line 
is indicated by the line number and the statement PRINT'???????????'’. 
In choosing what lines to drop out, the main consideration was to leave out 
some essential part of the program structure. The screen dumps should 
give you enough of an idea of how the program runs to allow you to think 
your way through to the full program. If you come up with a line that 
works and is not the one given in the answer, please write and let me know. 
There are many ingenious ways to solve programming problems. 
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- 1 - 

COUNTING BACKWARDS 

This program asks you for an integer and then counts backwards from that 
number to 1 and prints out the list 


RUN 
WATC 
WHAT 
^15 
JL5 
14 
1 3 
12 
J.T 
TO 

8 

7 

8 
5 
■4 
3 
2 : 

JL 


H ME COUNT BACKWARDS. 

NUMBER SHOULD I START FROM? 


10 PRINT “WATCH ME COUNT BACKWARDS." 

20 PRINT "WHAT NUMBER SHOULD I START F 
ROM?" 

30 INPUT X 
40 FOR Z-l TO X 
30 PRINT X 

60 PRINT “???????????????? M 
70 NEXT Z 
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- 2 - 

PATTERN MAKING 

This program prints out a pattern. One aspect of the pattern is left out for 
you to figure out. 


TRY TO MAKE YOUR OWN PATTERNS 

MM Y.Y.Y. Y.Y. Y.Y.Y. *** y„\ j 

kkk mmm ** xx xxx ## mm-»:; 

xxx v:* xxx mmm xxx xx xxx 

XXX XX XXX MM M XXX xx xx ; 

X MMM MM MMM Y.Y.Y, XX XXX MMM MM MMM Y.Y.Y. 

XX XXX MMM MM MMM Y.Y.Y. XX XXX MMM MM **:: 

XXX XX XXX MMM MM MMM Y.Y.Y. Y.Y. XXX MM : '- 

M MM MMM XXX XX Y.Y.Y. *tMM MM MMM Y.Y.Y, XX 

XXX MMM MM MMM XXX XX XXX MMM MM MMM y ii 

XX XX XXX MMM MM MMM XXX XX XXX M MM M-M-ji 

MMM XXX XX Y.Y.Y. KMX- MM MMM Y.Y.Y. Y.Y. Y. 

MM M MM MMM XXX Y.MMM MM MMM Y.Y.Y. XX X 

MMM MM MMM XXX XX XXX MMM MM MMM XX 

X XXX MMM MM MMM XXX XX Y.Y.Y. M MM MM MMM 

Y.Y.Y. XX XXX MMM MM MMM Y.Y.Y. Y.Y. XXX MMM 

MM MMM Y.Y.Y. Y.Y. XXX M MM M-M MMM Y.Y.Y. Y.Y. Y.Y. 

Y. MMM MM MMM XXX XX XXX MMM MM MMM Y.Y.Y.: 

Y.Y. XXX MMM MM MMM XXX XX XXX MMM MM M] 

mm- XXX XX XXX MMM MM MMM Y.Y.Y. Y.Y. Y.Y.Y. MM 

M MM MMM Y.Y.Y. XX Y.Y.Y. MMM MM MMM XXX XX 

XXX MMM MM MMM XXX XX XXX MMM MM MMM X I 

XX XX XXX MMM MM MMM XXX Y.Y. Y.Y.Y. MMM MM\ 


10 PRINT "HERE'S A EASY PATTERN TO PRI 
NT WITH A COMPUTER-" 

20 PRINT "TRY TO MAKE YOUR OWN PATTERN 

8 " 

30 FOR X-l TO 750SNEXT X 
40 PRINT ”?????????????????” 

50 PRINT U XXX XX XXX 
60 GOTO 40 
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xx ; 
xxx: 
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And here is the program with the missing line of code: 


10 PRINT "IS THIS A GOOD DAY FOR YOU?" 

20 PRINT "?????????????" 

30 INPUT A* 

40 IF A*«"YES" THEN PRINT "SHARE IT WI 

TH YOUR FRIENDS"SEND 
SO IF A*«"NO" THEN GOTO 100 
lOO GRAPHICS 7:COLOR 1 

110 PRINT "MAYBE THIS WILL MAKE YOU FE 
EL BETTER,.-" 

120 PLOT 159 p 80 

130 DRAWTO RND <1)#159 p RND <1)*00 
140 GOTO 120 
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GUESS 

This is a letter counting game. It flashes a word on the screen and asks you 
to guess how many letters it has. You can count the letters but estimating 
the length of the word is more fun. 


HOPEFUL 


YOUR GUESS? 

?7 

GREAT■ TRY ANOTHER 


Here is the program with the missing line of code: 


10 DIM A*(20),B*(20),C*<20> 

20 A*-"HOPEFUL" 

30 B*-"INDEPENDENCE" 

40 C*-"TROUBLE" 

50 PRINT "HERE ARE SOME WORDS TO STUDY 
FOR A FEW " 

60 PRINT "SECONDS. GUESS HOW MANY LET 
TERS ARE" 

70 PRINT "IN EACH WORD." 

80 FOR X-l TO 750:NEXT X 

lOO PRINT “??????????????????" 

110 PRINT «6|A* 

120 PRINT "YOUR GUESS?" 

130 INPUT W 

140 IF W-LEN(A*> THEN PRINT "GREAT! TR 
Y ANOTHER":FOR X-l TO 750:NEXT X:GOTO 
200 
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150 IF WOLEN<A»> THEN PRINT 11 TAKE ANO 
THER LOOK”:FOR X-l TO 750:NEXT XSGOTO 
lOO 

200 GRAPHICS 2:COLOR 1 
210 PRINT #6|B* 

220 PRINT "YOUR GUESS?" 

230 INPUT Z 

240 IF Z-LEN<B*) THEN PRINT "GREAT! TR 
Y ANOTHER":FOR X-l TO 750:GOTO 300 
250 IF Z< >LEN(Bt) THEN PRINT "TAKE ANO 
THER LOOK":FOR X-l TO 750:NEXT X:GOTO 
200 

300 GRAPHICS 2:COLOR 1 
310 PRINT #61C* 

320 PRINT "YOUR GUESS?" 

330 INPUT H 

340 IF H-LEN<C*) THEN PRINT "GREAT! YO 
U GOT ALL THREE"SEND 

350 IF H< >LEN <C#) THEN PRINT "TAKE ANO 
THER LOOK":FOR X-l TO 750:NEXT X:GOTO 
300 
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- 5 - 

NEXT LETTER 

This program asks for a letter and then gives you the next letter in the 
alphabet. It won't be tricked if you ask for the letter after Z. 


RUN 

give: me a letter xn the alphabet 

AND* I'LL TELL YOU THE MEHT LETTER. 
DON’T TRY TO TRICK ME WITH Z BECAUSE 
I'VE ALREADY LEARNED THAI' IT IS THE 

LAST LETTER. 

THE NEXT LETTER IS X 

READY 

RUN 

GIVE ME A LETTER IN THE ALPHABET 

AND I’LL TELL YOU THE NEXT LETTER. 
DON’T TRY TO TRICK ME WITH Z BECAUSE 
I’VE ALREADY LEARNED THAT IT IS THE 

LAST LETTER .. 

•>> m 

THE NEXT LETTER IS S 
READY 


10 PRINT "0IVE ME A LETTER IN THE ALPH 
ABET” 

20 PRINT "AND I'LL TELL YOU THE NEXT L 
ETTER. M 

30 PRINT "DON'T TRY TO TRICK ME WITH Z 
BECAUSE" 

40 PRINT "I'VE ALREADY LEARNED THAT IT 
IS THE" 

50 PRINT "LAST LETTER." 

60 DIM A«<26> V B*<1> 

70 LET A*«"ABCDEFQHIJKLMNOPQRSTUVWXYZ" 
80 INPUT B* 

90 FOR X-l TO 26 

lOO PRINT "??????????????????????" 

110 NEXT X 
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- 6 - 

THIRD LETTER 

Here is a puzzle that uses the same concept as Puzzle 5. You should be able 
to get this one more easily: 


RUN 

NHAT IS YOUR NAME? 

?SOCRATE5 

DID YOU KNOH THAT THE THIRD 

LETTER IN YOUR NAME IS..C 

READY 


10 PRINT "WHAT 18 YOUR NAME?” 

20 DIM At (25) 

30 INPUT At 

40 PRINT "DID YOU KNOW THAT THE THIRD” 
50 PRINT "LETTER IN YOUR NAME IS.. H | 

60 PRINT "?????????????????” 
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- 7 - 

NEXT NUMBER 

Recently you tried a "next letter” puzzle. Here is a next number puzzle: 


RUN 

WHAT NUMBER COME5 AFTER..38 

?37 

TRY AGAIN... 

?32 

TRY AGAIN... 

JL 

TRY AGAIN... 

TRY AGAIN.. 

ABSOLUTELY! 

READY 



10 PRINT "WHAT NUMBER COMES AFTER.. M | 
20 LET X-INT(RND(1)*100)+1 
30 PRINT X 
40 INPUT Y 

50 IF Y-X+l THEN PRINT M ABSOLUTELY! H :E 
ND 

60 IF YOX + 1 THEN PRINT "TRY A6AIN. . . M 
70 PRINT "??????????????????" 
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- 8 — 

CALCULATE 

Here is a simple arithmetic challenge: 


RUN 

PICK A NUMBER FROM JL TO 20 

■ mi.' 

WHAT IS 4 TIMES THAT NUMBER MINUS 3 

Hinninn!!! ?±-* 

TRY AGAIN . . . 

iiiliimiiiiiii ?12 

TRY AGAIN... 

nniniiiiinn ? ± ? 

YOU GOT ITS! 

Ijlliii READY 


Here is the program for it with a missing line: 


10 PRINT "PICK A NUMBER FROM 1 TO 20" 
20 INPUT X 

30 PRINT "WHAT IS 4 TIMES THAT NUMBER 
MINUS 3?" 

40 INPUT Y 

50 PRINT "????????????????????" 

60 IF Y-Z THEN PRINT "YOU GOT IT!!"SEN 
D 

70 IF YOZ THEN PRINT "TRY AGAIN. . ." 

80 GOTO 40 
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- 9 - 

COMPARISON 

This program generates two random numbers and asks you which is the 
larger. It does not give you a second chance but gives you another problem 
instead. 


HERE * SAREAL SIMPLE MATH GAME 
WHICH NUMBER 15 LARGER 

21 OR 29 

?29 

RIGHT j, TRY ANO THER ONE 

WHICH NUMBER 15 LARGER 

15 OR 48 

?15 

SORRY TRY ANOTHER EXAMPLE 


WHICH 

NUMBER 

IS 

LARGER 

43 

OR 


44 

?44 

RIGHT, 
WH I C H 

TRY ANOTHER ONE 
NUMBER IS LARGER 

2 7 

OR 


1 « 

Z '2-IM, , ■ ■ 





Figure out the missing line: 

lO PRINT "HERE'S A REAL SIMPLE MATH GA 
ME" 

20 LET X-INT(RND<1>»50> 

30 LET Y-INT(RN0(1)*S0> 

40 IF X-Y THEN SOTO 20 

50 PRINT "WHICH NUMBER 18 LARGER" 

60 PRINT 

70 PRINT X,"OR",Y 
80 PRINT 
90 INPUT Z 

100 IF Z-X THEN GOTO lOOO 

110 PRINT ■???????????????????“ 

lOOO IF X>Y THEN PRINT “RIGHT, TRY ANO 

THER ONE":GOTO 20 

1010 PRINT " SORRY TRY ANOTHER EXAMPLE 
":80T0 20 

2000 IF Y>X THEN PRINT "RIGHT, TRY ANO 
THER ONE":GOTO 20 

2010 PRINT " SORRY TRY ANOTHER EXAMPLE 
"SBOTO 20 
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- 10 - 

DICE 

This program sets up the computer to roll a pair of dice and then gives you 
the total of the two rolls. It can be incorporated into many game programs. 


RUN 




X KNOW 

HOW TO 

ROLE DICE 


HERE * S 

DIE X : 

DIE 2 : 

TOTAL: 

MY ROLE 

I 

3 

4 



DO YOU 
?YE5 

WANT ME 

TO ROLL 

AGAIN? 

HERE - S 

DIE I : 

DIE 2 : 

TOTAL: 

MY ROLE 

5 

3 

S 



DO YOU 

?NO| 

WANT ME 

TO ROLL 

AGAIN? 


Fill in the missing line: 


10 PRINT "I KNOW HOW TO ROLE DICE'* 

20 PRINT "HERE'S MY ROLE:" 

30 LET X-INT<RND<1>*6>+1 
40 LET Y-INT<RND<1)*6)+1 
30 PRINT 

60 PRINT "DIE l:", X 
70 PRINT 

80 PRINT "DIE 2:",Y 
90 PRINT 

100 PRINT "?????????????????????" 

HO PRINT 

120 PRINT "DO YOU WANT ME TO ROLL A8AI 
N?" 

130 CLR 
140 DIM A*<3) 

150 INPUT A* 

160 IF A*«"YES" THEN GOTO 20 
170 PRINT "THAT'S ALL FOLKS."SEND 
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Answers 


1 


10 PRINT “WATCH ME COUNT BACKWARDS." 

20 PRINT "WHAT NUMBER SHOULD I START F 
ROM?" 

30 INPUT X 
40 FOR Z-l TO X 
30 PRINT X 
AO LET X-X-l 
70 NEXT Z 


The missing line decreases the size of X each time the program runs 
through the loop. You could count backwards by 2s, 3’s, or any other 
number. 


2 


10 PRINT "HERE'S A EASY PATTERN TO PRI 
NT WITH A COMPUTER." 

20 PRINT “TRY TO MAKE YOUR OWN PATTERN 
S" 

30 FOR X«1 TO 750:NEXT X 
40 PRINT “*** ** *** "j 
50 PRINT "XXX XX XXX "J 
60 GOTO 40 


It is very easy to make patterns with your Atari. In fact, one chapter of 
this book contains a whole series of moderately complex pattern puzzles. 
What you have to look for in making patterns is the arrangement of blank 
spaces as much as the placement of symbols. The ; is what creates a 
continuous pattern across the screen and, since the line scrolls around, you 
will often find patterns that don't look at all like you expect them to. It is a 
delightful idle activity to explore patterns at random and develop an intui¬ 
tive sense of how lines like these will look when repeated on the screen in 
an infinite loop: 
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***** ? **$$$ 

7.7*7.7.7. >S ? 2>8>8>3 

00S vvv C C C 3 2 D v- ©pip) 


3 


10 PRINT M IS THIS A GOOD DAY FOR YOU?" 
20 DIM A*<3> 

30 INPUT A* 

40 IF A*-"YES" THEN PRINT "SHARE IT WI 
TH YOUR FRIENDS”:END 
50 IF A*-"NO” THEN GOTO 100 
lOO GRAPHICS 7:COLOR 1 

110 PRINT "MAYBE THIS WILL MAKE YOU FE 
EL BETTER.■." 

120 PLOT 159,80 

130 DRAWTO RND(1)*159,RND(1)*80 
140 GOTO 120 


The challenge here is to define the lower left-hand point of the Gra¬ 
phics 7 screen. Try to do the same program in other Graphics modes and 
see how the modes differ. You can mix Graphics modes within a program 
and it is useful to explore them all in order to be able to choose the right 
Graphics format for your programming purposes. 


4 


10 DIM A*(20),B*<20>,C*<20) 

20 A*-"HOPEFUL" 

30 B*»"INDEPENDENCE" 

40 C*-"TROUBLE" 

50 PRINT "HERE ARE SOME WORDS TO STUDY 
FOR A FEW " 

60 PRINT "SECONDS. GUESS HOW MANY LET 
TERS ARE" 

70 PRINT "IN EACH WORD." 

80 FOR X-l TO 750:NEXT X 
100 GRAPHICS 2:COLOR 1 
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HO PRINT #69A* 

120 PRINT M YOUR GUESS?" 

130 INPUT W 

140 IF W-LEN<A*> THEN PRINT "GREAT! TR 

Y ANOTHER":FOR X-l TO 1500:NEXT X:80T0 
200 

150 IF W< >LEN<A#) THEN PRINT "TAKE ANO 
THER LOOK":FOR X-l TO 750:NEXT X:GOTO 
100 

200 GRAPHICS 2:COLOR 1 
210 PRINT #69B* 

220 PRINT "YOUR GUESS?" 

230 INPUT Z 

240 IF Z—LEN <Bt) THEN PRINT "GREAT! TR 

Y ANOTHER":FOR X-l TO 1500:GOTO 300 
250 IF Z< >LEN(B*> THEN PRINT "TAKE ANO 
THER LOOK":FOR X-l TO 750:NEXT X:GOTO 
200 

300 GRAPHICS 2:COLOR 1 
310 PRINT #69C* 

320 PRINT "YOUR GUESS?" 

330 INPUT H 

340 IF H—LEN<C#> THEN PRINT "GREAT! YO 
U GOT ALL THREE":END 

350 IF HOLENCC#) THEN PRINT "TAKE ANO 
THER LOOK":FOR X-l TO 1500:NEXT X:GOTO 
300 


This program uses Graphics 2, a large letter print mode. The program 
also uses a command you may not be familiar with but which is very useful: 
LEN(A$). This command gives you the length of a word or sequence of 
letters stored in a string. Thus, if you DIM A$(50) and INPUT A$ as “THE”, 
LEN(A$)=3. It can let you know how much room is left in a string, can 
create size-word relationships, etc. You will probably encounter it in many 
programs you copy from computer magazines. 


5 


Here is the program to fill out: 


10 PRINT "GIVE ME A LETTER IN THE ALPH 
ABET" 

20 PRINT "AND I'LL TELL YOU THE NEXT L 
ETTER.“ 
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30 PRINT "DON'T TRY TO TRICK ME WITH Z 
BECAUSE” 

40 PRINT "I'VE ALREADY LEARNED THAT IT 
IS THE" 

50 PRINT "LAST LETTER." 

60 DIM At<26> f Bt<l> 

70 LET At- H ABCDEFGHIJKLMNOPQRSTUVWXYZ" 
80 INPUT Bt 
90 FOR X-l TO 26 

lOO IF Bt«At<X f X) THEN PRINT "THE NEXT 
LETTER IS "|At(X+l,X+l) 

110 NEXT X 


The missing line involves using a function, A$(X,X) which gives you the 
Xth member of A$. It is more fully explained in the answers to other 
puzzles that use the same function. What you should note here is that 
A$(X+1,X+1) gives you the letter or symbol stored after X in A$. What do 
you think you'd get from A$(X+3,X+3)? 


6 


10 PRINT "WHAT IS YOUR NAME?" 

20 DIM At(25) 

30 INPUT At 

40 PRINT "DID YOU KNOW THAT THE THIRD” 
50 PRINT "LETTER IN YOU NAME IS.."| 

60 PRINT At(3,3) 


7 


10 PRINT "WHAT NUMBER COMES AFTER.. 

20 LET X“INT(RND<1)*100)+1 
30 PRINT X 
40 INPUT Y 

50 IF Y-X+l THEN PRINT "ABSOLUTELYE 
ND 

60 IF YOX+1 THEN PRINT "TRY AGAIN... M 
70 GOTO 40 
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This puzzle deals with setting up a loop to let a person try to correct a 
wrong answer. The reference of GOTO statements is essential to how a 
program runs. If you tried 

70 GOTO 20 

the target number and, therefore, the correct answer would be changed. It 
is useful to deliberately mess up your own programs and see what happens. 
Sometimes you’ll make interesting and useful discoveries. Other times 
you'll internalize ERROR statements and help yourself create bug free 
programs. 


8 


10 PRINT “PICK A NUMBER FROM 1 TO 20“ 
20 INPUT X 

30 PRINT "WHAT IS 4 TIMES THAT NUMBER 
MINUS 3?" 

40 INPUT Y 
50 LET Z«4*X-3 

60 IF Y-Z THEN PRINT "YOU GOT IT!!“SEN 
D 

70 IF YOZ THEN PRINT “TRY AGAIN..." 

80 GOTO 40 


In this case, you have to figure out how to perform the calculation 
asked for correctly and then give its result a new variable name, Z. If you 
forget to use this new variable you wont be able to use the result of the 
calculation in other parts of the program without doing a recalculation. In 
many programs, the introduction of new variables to indicate the results of 
processes or calculations is a convenient programming tool. 


9 


10 PRINT "HERE'S A REAL SIMPLE MATH GA 
ME" 

20 LET X«INT<RND<1)*50> 

30 LET Y“INT < RND(1)*50 > 

40 IF X-Y THEN GOTO 20 

50 PRINT “WHICH NUMBER IS LARGER" 

60 PRINT 
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70 PRINT X,"OR",Y 
BO PRINT 
90 INPUT Z 

100 IF Z-X THEN GOTO lOOO 

110 XF Z-Y THEN GOTO 2000 

lOOO IF X>Y THEN PRINT -RIGHT, TRY ANO 

THER ONE":GOTO 20 

1010 PRINT “ SORRY TRY ANOTHER EXAMPLE 
M :GOTO 20 

2000 IF Y>X THEN PRINT "RIGHT, TRY ANO 
THER ONE":GOTO 20 

2010 PRINT " SORRY TRY ANOTHER EXAMPLE 
"5SOTO 20 


This is another puzzle in which you have to figure out the correct 
GOTO reference. Instead of sending you back to an earlier part of the 
program as most of the GOTO puzzles did, this one sends you to the end of 
the program. It is important to realize that the GOTO command can allow 
you to jump all over your program. 


10 


10 PRINT "I KNOW HOW TO ROLE DICE- 
20 PRINT "HERE'S MY ROLE:" 

30 LET X-INT<RND<1)*6>+1 
40 LET Y»INT(RND<1)*6)+1 
50 PRINT 

60 PRINT "DIE l:", X 
70 PRINT 

GO PRINT "DIE 2:",Y 
90 PRINT 

100 PRINT "TOTALS",X+Y 
110 PRINT 

120 PRINT "DO YOU WANT ME TO ROLL AGAI 

N?" 

130 CLR 
140 DIM At(3) 

150 INPUT At 

160 IF At-"YES" THEN GOTO 20 
170 PRINT "THAT'S ALL FOLKS.":END 

Line 100 lets you both add the total and print it out at the same time. 
There are times when it is convenient to use the PRINT statement in 
conjunction with a computation, especially if you do not want to store the 
result of the computation in any other part of the program. 
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T he Atari computer has a control graphics keyboard that is invisible 
unless you press the control key CTRL and then a letter. (Consult your 
ATARI BASIC Reference Manual for a diagram of the Control Graphics 
Keyboard.) 

The shapes on the CTRL keyboard can be used to make very interest¬ 
ing designs and pictures. They can also be mixed with letters to make 
borders and designs within your ordinary text. They do not need a special 
Graphics command and print straight from the keyboard. They can also be 
embodied in PRINT statements along with numbers and letters and can be 
stored in dimensioned strings the way letters can. Here are a few simple 
examples of the way control character graphics programs work. They 
should help familiarize you with their function and help you understand 
how to solve the puzzles in this chapter. 

The first sample simply uses the combination [CTRL][,] to produce a 
heart which is used as a border around a declaration of love: 


READY 
16 PRINT' 
2: © PRINT' 

3 © PRINT' 

4 © PRINT 
RUIN 


4p <p Ip 4* H* <¥ w ■¥■ ■* ■¥■ 1 ?-v ■¥■ W 8 8 

+ I L. OOE YOU 

YE5 I DO 


* I LOVE Y DII 
^ VE5 X DO 

4T 4* * ^ 4* HP 4* ^ 4? ^ 4* 4* 


The second example uses the numbers 1, 2, 3, and 4 along with the 
[CTRL][.] character to produce a field of numbers followed by diamonds 
that have the same value as the numbers. Notice that the whole program is 
just two lines long. 
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lO PRINT •'14 24 4 34 4 4 44444"';. 

20 GOTO lO 

RUN 

JL 4 24 4 3 44 4 4 4444 JL4 24 4 3 4 0 4 4 4 444 JL.4 21; 

44 3*** 4444414 244 3 4 4 4 4444414 244 3!! 

444 4444414 244 3 44 4 4 4 4 4 4 14 2## 3 444 

2 4 4 3*## 4444414 2^4 34#4 4444 

4 14 2#* 34 44 4444414 244 3 4 44 44444.14 

2 4 4 3444 4444414 244 3444 4444414 244 

3444 4444414 244 3444 4444414 244 3444 

4444414 2 4 4 3 4 4 4 4444414 244 34 4 4 4 44! 

44 14 2 4 4 3 4 4 4 4444414 244 3444 4 444414:: 

24 4 3# ♦ ♦ 4 444414 2#* 3 444 4444414 244 

3444 4444414 244 3444 4444414 244 344i 

♦ 4 444414 24* 3444 4 444414 244 34 4 4 4#ii 

44414 244 34 4 4 4444414 244 3444 444441: 

4 244 344R 


The third program, which also consists of only two lines, uses combi¬ 
nations of control characters. The triangular shape is made out of [CTRL]H 
followed by [CTRL]J and the table-like shape comes from combining 
[CTRLJQ and [CTRL]E. Notice that the placement of spaces on line 10 
controls how the program looks when it runs. You might want to experi¬ 
ment with a few design programs before trying to solve some of the design 
problems in this chapter. 



The fourth program is a variant of the third. The table forms have been 
removed to create a mountain range effect: 
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Now for some control graphics problems. Use the [CTRL] character 
chart and the sketch pad in the appendix to help you solve them if you 
haven't memorized the control characters and don’t happen to have a 
computer available. 
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- 1 - 

PLASTIC SURGERY I 

Here is a face, perhaps not the most beautiful one in the world but never¬ 
theless one with character. Using [CTRL] graphics try to reconstruct it. 


RIJN 

/ -- \ 


♦ 

u T . 




l> Y 




































































- 2 - 

PLASTIC SURGERY II 

Here's the same face scrambled up as well as the program that generates 
the scramble. Try to reconstruct the original face by reordering the line 
numbers without looking at the answers to [CTRL] Puzzle 1. The answer to 
this puzzle is exactly the same as the answer to Puzzle 1. 



O REM CTRL85 
10 PRINT 
20 PRINT 
30 PRINT 
40 PRINT 
50 PRINT 
60 PRINT 
70 PRINT 
OO PRINT 
5*0 PRINT 
100PRINT 
HOPRINT 

READY 


k 


/■ 


I ♦ i“ 
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- 3 - 

TITLE PAGE 

This program asks for someone's name and then prints out a simple title 
page for a book. Construct a program that does this for any name input. 


RUM 

WHAT 15 VOUR MAME? 
7IERICA 5IMTH 





























































-4 to 9- 

DESIGN DECIPHERING 

This is a series of [CTRL] character designs for you to decipher and try to 
reproduce. Remember that some of the characters are made up of combi¬ 
nations of other characters. Also, the use of blank spacing is essential to get 
the design. I suggest you do some sketching and experimenting with com¬ 
binations of [CTRL] characters in the course of trying to reproduce these 
designs. There is a sketch pad in the Appendix which is a reproduction of the 
grid on the Graphics 0 screen which uses regular print as well as [CTRL] 
graphics. 


[CTRL] Design 4: Almost Music 
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[CTRL] Design 5: Diz 2 y Roads, Shaky Bridges 



[CTRL] Design 6: Stripes at Cross Purposes 































[CTRL] Design 7: Clear Cutting in the Mountains 
















•roller# 


[CTRL] Design 9: Dense Environment 


• —1 • •®/k***J Jl —* •• 

J mM • * • V'V* * •—| -Jl wl •••/ 

• **—| -Jl • *•/K.«»«► *-J -Jl •••✓Kw 

•«J -Jl • •I -Jl •««A«o«h| —I *•w/w®• • 
| -J * * */W» * *-J JJ -J • •*/W***-JI 


«J Jl »**/W**«-| -J •••/w* 

I JJ *> * •/k • • • «-! —I • * * * • 

• -J • • •/ko«5-J —I i 

mM -Jl •••/ r 


JJ -I 

• -J J • • • /k * • * hJ -J 

• mM • •• /W••• -J JJ O 

-Jl • ••/W*# •-! .J mM 


__ •••/%.•• •mM mM ;! 

I 0«*/k«**n| —J 
• •/!.•*•-! rnM •••/ 
‘ I —1 •••/k*;; 

—I -Jl 


-I -Ji -J mM 

-J Jl -Jl • hJ 


. .__ mM • J Jl • * •/V« • •«■! I .. 

• • */k* • •—I J JJ • • »/k« • «-4 —I • 

•/k«*«-J —I JJ • JJI *••/:: 

k***-l JJ >J Jl 

• •—I J JJ • • nUi • • *A»** 

-I JJ •**/k**»-| JJ •••/w*• I —1 • 

—I • • • A* • • —■ Jl ••• A ••• —I -J •••/;; 


► * •✓'W* • •- 


rdr.: 
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- 10 - 

ALPHABET RECONSTRUCTION 

Now that you've spent some time dealing with some fairly complicated 
designs, here’s a simple alphabet to reconstruct. It doesn't use [CTRL] 
characters but does use the keyboard and the program structure of BASIC 
in the same way that the previous program did. 


MNOP OR 5- & TUU M K & VZ 

l MMOP ORS S TUU W K S Y 

LHNOP RRS & TUU H H S 

K L. MM OP ORS S TUU M K S 

JK LMNOP ORS S TIJM M K 

UK LMNOP OR5 S TUU W K 

HIJK LMNOP ORS S TUU M 

HUK LMNOP ORS TUU W 

G HIJK LMNOP ORS S TUU 

Ci HIJK LMNOP ORS S TUU 

FG HIJK LMNOP QRS S TUU 
EFG HIJK LMNOP ORS S TU 

CHEF-'G HIJK LMNOP ORS S T 

PEFG HIJK I... MNOP ORS S 
C OEFG HIJK LMNOP ORS S 
BC DEFG HIJK LMNOP ORS 
ABC l> L F- G HIJK LMNOP ORS 

ABC [>EFG HUK. IMNOP OR 

Z ABO 9>BF G HI JK LMNOP « 

YZ ABC DEFG HIJK LMNOP 

YZ ABO DEFG HIJK LMNOP 
S YZ ABC DEFG HIJK LMNO 


ABC DEFG HIJK 
Z ABC DEFG HIJK 
YZ ABC DEFG HU 

YZ ABC DEFG Hlli 

S YZ ABC DEFG H 

& VZ ABC DEFG 
X S YZ ABC DEFG 

S YZ ABC DEF Hi 

IN X S YZ BC DEFiii 

IN X S YZ ABC DE 

H K S YZ ABC t>: 

U W K & YZ ABC i 
UU W X S YZ ABC:; 

TUU U K S YZ AB 

TUU H H & YZ A 

A TUU W X & YZ 
S TUU W K S YZ 

S & TUU IN K S Y 
RS S TUU W X 8- 

ORS Sc TUU W X & 
ORS S TUU W K 

P ORS S TUU M K 
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- 11 - 

NUMBER GRAPHICS 

Now that you've had a chance to relax, here's a slightly more complex 
problem using a mix of [CTRL] graphics and numbers. Notice that the 
numbers change in the design in a regular way. The program structure is 
somewhat different than the ones you've seen before but the program is 
not much longer. 
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- 12 - 

FINISH THE TABLE 

Put the missing leg on the table using [CTRL] graphics. Of course, you'll 
have to write the whole program for the table to do it. 


I 


U 


READY 

PUT THE OTHER LEG OH THE TABLE 
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-13- 

STORMY WEATHER 

The sea is not calm tonight as you can see from the screen dump below. 
Under that is a puzzling sea, one that questions the very nature of calm¬ 
ness. Can you write programs for each of these screen dumps? 





































- 14 - 

SYMBOL ADDITION 

Here is a game using numbers and [CTRL] characters. Three symbols 
represent numbers. You are asked to memorize the symbol/number equi¬ 
valents and then do addition using the symbols. It is a good memory game 
that can be made quite complex. Write a program for this game. 


RUN 

HERE'S A LITTLE SYMBOL-NUMBER GAME: 

STUDY THIS T ABLE OP VALUES: 

* = I 

+ = 2 

= 3 

WHEN YOU HAVE THE TABLE MEMORIZED 

PRESS 7 


HOW MUCH 


TRY 

3 

TRY 
YOU GOT 


DO THESE 

+ ?b 

ANOTHER TIME. 


ADD UP TO? 


ANOTHER TIME, 
IT DOUN• 

READY 
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- 15 - 

SIMPLE ANIMATION 

Here are two simple animations you can make with control character 
graphics. You can actually get quite complex with them, although, of 
course, you won't be able to duplicate the work of Walt Disney or George 
Lucas. With Graphics 8, you might be able to get close but here is a modest 
stick figure beginning. These two dumps show the repetitions of a figure 
that moves up the screen while changing position and posture. See if you 
can recreate the figures and have them move as in the screen dumps. 


-JL- 

i ! 


-5- 

-“1— 
/ "V 


-5» 

- 1 - 


M/ 

x x 


-I- 
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Answers 

— 1 and 2 - 


0 REM CTRL8 
X O PRINT ■» 

20 PRINT • ■ 

3 0 PRINT * 11 

40 PRINT * g 

5© PRINT " 

SO PRINT '■ 

70 PRINT 88 

S 0 PRINT M 

90 PRINT 18 

I 0 O P R I N T 88 

liOPRINT 88 

READY 



L 1ST 

O REM CTRL8U 
I© PRINT 
00 PRINT 
30 PRINT 
40 PRINT 
5© PRINT 
0O PRINT 
70 PRINT 
80 PRINT 
58 PRINT 
100 PRINT 
I10 PRINT 

READY 


>^X^^ZZZZ,. 

Z --L- \ 


Notice that there are two answers given, one that duplicates the face 
exactly and a second that pushes the chin off at lines 100 and 110. When 
run they will give you the exact same thing. The reason that answer 2 
seems pushed in is that your Atari automatically puts a space between the 
line number and the command following it. Since 10 to 99 have only two 
digits, they line up. 100 and 110 have three digits so they push the 
command over one space. You have to back it up in your mind to recon- 
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struct the image the program will run. This is important to remember 
when you list and edit control character graphics. 


3 


LIST 

O REM CTRL3U 
10 DIM A$(503 
20 PRINT "WHAT 

30 INPUT A$ 

40 PRINT 
50 PRINT 
66 PRINT 
70 PRINT 
O0 PRINT 
SO PRINT 
100 PRINT 


IS YOUR NAME?' 


** READ THIS BOOK BY I 


i 0$ 


*1 1 


110 

120 


PRINT 

END 




4 to 9 


Almost Music 



ipiiniliHil list 

- 

!l!i!i!!;i;!!!!! 0 REM CTR 


10 PRINT 

w 

20 goto jl 


HipipipilHi READY 

— 

■ 
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Dizzy Roads, Shaky Bridges 




O REM CTRL12U 

10 PRINT * * i-| + | 

20 GOTO 10 


Stripes at Cross Purposes 


LIST . 

O REM CTRL9U 

IS pSxhT 

3© GOTO IO 
READY 
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Clear Cutting in the Mountains 


0 REM CTRL2U 
JLO PRINT r r r r 
20 GOTO JLO 


Fences and Roads 


LI5T 

0 REM CTRL16U 

I© PRINT " T ' | . I' h Hi H JLa - *■ 

20 PRINT ■* Mh Rh hh 

30 GOTO JLO 

READY 
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Dense Environment 




O REM CTRLilU 
AO PRINT "mJ 
20 GOTO AO 

READY 


10 


LI ^ T 

O REM CTRL12U 

AO PRINT "ABC DEFG HIJK LMNOP ' ■ ; 

20 PRINT "QRS & TIJV M X & YZ 

30 GOTO AO 

READY 


Notice that I used three lines in the program instead of two. Using the 
; at the end of lines 20 and 30 creates the continuity of the program. 
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l_ T 5 7 


0 

REM CTRL5U 


10 

FOR X~1 TO 

TO 

2:0 

FOR V = 1 TO 

10 

30 

PRINT «■ HH 

"J Y) 

40 

NEXT Y 


50 

NEXT X 


READY 


n 




Notice that the changes in the numbers throughout the program are 
determined by the nested FOR/NEXT loops. If you are not familiar with 
nested loops, it would be useful to trace the program step by step. For 
example, the X loop instructs you to print what is inside the Y loop 10 
times and then go back to the start and keep on repeating the Y loop 10 
full runs. 

Once you understand this and trace it through you should be able to 
use nested loops in many different contexts. 
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This drawing problem can lead to dozens of others. Try to make up 
some for your family and friends, and have them be as creative in drawing 
and challenging you as well. 


Ill 






LIST 

O REM CTRL4LI 
10 PRINT *■ 

20 PRINT " 

30 PRINT " 

40 PRINT ** 

50 PRINT " r— 
60 PRINT 
70 PRINT 
©O PRINT 
30 PRINT 

READY 



ijiiil 

:::::: 

nils) 

:::::::: 






:::::::::::: 


r 




iiUi 
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O REM CTRL6U 

10 PRINT "THE 5E0 IS NOT CALM TONIGHT. 

20 PRINT 
30 PRINT 
40 GOTO 20 

READY 
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LIST 


O REM CTRL65 

10 PRINT "THE SEA IS MOT CALM TONIGHT, 

30 PRINT * • » « 

40 GOTO 20 

■ 

READY 


14 


LIST 0,150 

O REM CTRL7S 
I© print “Here 1 

R GAME:* 


LIT TLE S Y MB 01_ - N li MB E •• 


20 
3 O 


DIM A$(i),C$tl) 
LET A$-"¥":LET B5= m +' 


40 PRINT 


SO 
5 0 
7G 
BO 
SO 
JLO0 


PRINT • 
PRINT 
PRINT * 
PRINT 
PRINT ■ 
PRINT 


THIS 
¥ = 1" 

4- - 2 ■ • 

= 3" 

■WHEN YOU HAVE THE 

‘PRESS 7" 


LET C $ = 


TABLE OE UALUES!" 


TABLE ME M;| 


HO PRINT 
ORIZED" 

12© PRINT 
130 INPUT H 

140 IF K = 7 THEN PRINT • • H ■ ■ 

ISO ERROR- LET Y —H?????????????? 


1 

e 

0 

E 

R 

R 

O 

R 

— 



L 

E 

T 


Z 

— ! 

a 

7 ■ 

1 

2 

0 

P 

R 

I 

N 

T 

• * 

H 

O 

W 


MU 

C 

H 

Di 

i 

© 

0 

P 

OR 


M 

= 1 


T 

O 


Z 






l 

S 

0 

I 

F 


Y 

— 

1 

T 

H 

E 

N 


P 

R 

I 

N 

T 

2 

o 

0 

I 

P 


Y 

— 

2 

T 

H 

E 

N 


p 

R 

I 

N 

T 

2 

1 

O 

I 

r 


Y 

r= 

3 

T 

H 

E 

N 


P 

R 

I 

N 

T 

2 

2 

0 

N 

E 

X 

T 


M 











2 

3 

O 

I 

N 

P 

U 

T 

N 











2 

4 

O 

I 

F 


X 

“ 

Y*Z 


T 

H 

E 

N 


P 

R 

II 

HN 

• ■ 

* * 

E 

N 

D 













2 

5 

6 

P 

It 

I 

N 

T 


T 

R 

Y 


A 

N 

O 

T 

H 

E 


::± 


r "YOLK 
TIME . ■ 


GOT IT D O i| 
:GOTO 2 3 Oil 
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RFADV 

LIST 

O BEM CTRI.. I U 
10 PRINT " 

PRINT “ 1 

PRINT * * 
PRINT ■" 
PRINT 
PRINT 
FOR X = I TC 
PRINT * * 
PRINT *' 
PRINT “ 

P R I N r 


20 
30 
40 
SO 

59 

60 
20 
80 
s»o 
100 
110 PRINT 
120 FOR X “X 
I30 GOTO .1 O 


- 1 - 


i 


O 1OO:NEKI K 

1”™"* 

/ V 

I O :1 OO : NEK T X 


O REM CTRLIT 
10 PRINT " 
PRINT " 
PRINT “' 
PRINT M 
PRINT 
PRINT 
FOR X = I T 
PRINT " 
PRINT ■■ 
PRINT •* 
100 PRINT ■■ 
110 PRINT 
120 FOR X = I 
PRINT 
PRINT * * 
PRINT •• 
PRINT 
PRINT •* 
FOR X-I 


20 
30 
4 O 
50 
SS> 
60 
20 
OO 
OO 


130 

I40 

150 

160 

120 

IOO 


-i- 


190 GOTO IO 
READY 

; .P... 


I 


O IOO:NEXT X 
-5- ,B 

—.J.7T*" 

/ \ 

TO IOO;NEXT X 

MfT 

x \ 

TO TOO:NEXT X 


The key structural elements of these programs could be described as: 

PRINT Figure 1—PAUSE TO SEE IT 
PRINT Figure 2—PAUSE TO SEE IT 
—GO BACK TO FIGURE 1 


Teasing out the structure of programs in this way can 
your own programs or modify those other people design. 


help you create 
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Appendix 
Planning Sheets 

These pages are designed to help you solve some of the problems in this 
book. They consist of a series of TV or monitor screens with room under 
them to write lines of code. They can be used in many different ways and 
some readers will certainly develop their own aids to solve the puzzles. Here 
are two examples of how they can be used for two puzzle versions of this 
simple program: 

10 PRINT "HOW OLD RRE YOU?" 

20 INPUT X 

30 LET Y=1983-X 

40 PRINT "YOU WERE BORN IN ";Y 

Puzzle version 1 :missing line of code 

10 PRINT "HOW OLD RRE YOU?" 

20 INPUT X 

30 PRINT "?????????????" 

40 PRINT "YOU WERE BORN IN ";Y 

Puzzle version 2:scrambled line number version 
10 INPUT X 

20 PRINT "HOW OLD RRE YOU?" 

30 PRINT "YOU WERE BORN IN ";Y 
40 LET Y=1983-X 
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30 y — year— Vv>o? 

7 old 

S awe as above +* 
you were. bo*ri in / 


MO PR. * Vou went 
born in w : V 


Solut/oM 



Mo you 
born inj y 
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SKETCH PAD 

FOR 

CONTROL GRAPHICS 
AND TEHT 
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Graphics Mode 2 













































































































































































































ATARI® 
PUZZLEMENTS 

Herbert Kohl 


This book of puzzles will make you long for rainy Sunday 
afternoons rather than moan about them! Written for beginners 
(but not without plenty of challenges), ATARI PUZZLEMENTS 
will make you think—and, as an added bonus, it teaches you to 
think in BASIC. Most of the puzzles can also be worked out on 
paper, so you can while away the tedium of airplane trips or 
waiting for the dentist and still sharpen your computer skills. 

Mastering the simple programs so elegantly presented for your 
ATARI Home Computer will provide hours of entertainment for 
the whole family. Even young readers will enjoy experimenting 
with combinations of the programs to come up with unique 
challenges of their own. And, how refreshing to find that your 
solutions don't have to#match an answer key to be exactly, entirely 
correct. 


A Creative Pastimes Book 
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